home *** CD-ROM | disk | FTP | other *** search
- on IncreaseSpeed
- global theBackgroundVelocity, theMaxSpeed
- set theBackgroundVelocity to theBackgroundVelocity - 1
- if GetMovingRight() = 0 then
- set theBackgroundVelocity to theBackgroundVelocity - 1
- end if
- if theBackgroundVelocity < -theMaxSpeed then
- set theBackgroundVelocity to -theMaxSpeed
- end if
- end
-